home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Magnum One
/
Magnum One (Mid-American Digital) (Disc Manufacturing).iso
/
d20
/
btd_301.arc
/
BTD2.BAT
< prev
next >
Wrap
DOS Batch File
|
1991-11-30
|
2KB
|
101 lines
echo off
cls
: *****************************************************
: This batch file assumes the BBS is spawned from BTD
: *****************************************************
: Start up your FOSSIL
btf1m -m-
: Start up BTD with a configuration file
:loop
btd btd.cf2
echo .
: Check all returned errorlevels
: This from Maximus
if errorlevel = 255 goto exit
: These are our errors
if errorlevel = 246 goto exit
: Handle a midnight event
if errorlevel = 240 goto midnight
: Trap user exit levels
if errorlevel = 203 goto newday
if errorlevel = 202 goto packsys
if errorlevel = 201 goto exit
if errorlevel = 30 goto loop
: These exits are from Maximus
if errorlevel = 16 goto stackerr
if errorlevel = 12 goto echonet
if errorlevel = 11 goto netmail
if errorlevel = 5 goto notechonet
if errorlevel = 4 goto maxerr3
if errorlevel = 3 goto maxerr2
if errorlevel = 2 goto callergone
if errorlevel = 1 goto maxerr1
echo ALL OKAY...
goto loop
: Unpack for a new day
:newday
cd \max\games\lists
pkunzip x -o g_blanks
goto loop
: Pack up system files
:packsys
cd \max
pkzip a sysfiles *.bbs *.log \max\quests\*.ans
goto loop
:midnight
echo BTD: Midnight rollover
goto loop
:userexit
echo BTD: Any user event exit (30-239)
goto loop
:stackerr
echo Max: internal stack error
goto exit
:echonet
echo Max: Echo/Net Mail entered
goto loop
:netmail
echo Max: Net Mail entered
goto loop
:notechonet
echo Max: No Echo/Net Mail entered
goto loop
:maxerr3
echo Max: Error Condition 3
goto exit
:maxerr2
echo Max: Error Condition 2
goto exit
:callergone
echo Max: Caller vanished during log-on
goto loop
:maxerr1
echo Max: Error condition 1
:exit